home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / DEF / Utilities / Supplements / virtual-channels < prev   
Text File  |  1996-07-01  |  419b  |  29 lines

  1. ;; Using virtual channels
  2. ;; Max channels: 256
  3.  
  4. (def-orchestra 'orchestra
  5.    all-instruments (piano synth bass)
  6. )
  7.  
  8. ; Here the channels are set up manually
  9.  
  10. (def-section a
  11.   default
  12.     zone '(1/16)
  13.     tonality (activate-tonality (major c 4))
  14.     length '(1/16)
  15.     velocity '(64)
  16.     symbol '(a b c)
  17.   piano 
  18.     channel 1
  19.   synth
  20.     channel 17
  21.   bass
  22.     channel 33
  23. )
  24.  
  25. (play-file-p "test"
  26.    all-instruments '(a)
  27. )
  28.  
  29.